home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / fonts / altfntpc.lha / AltFontPatch / Instalace_WB_1.3 < prev    next >
AmigaDOS Script File  |  1994-07-07  |  4KB  |  137 lines
  1. .KEY DEST
  2. .BRA {
  3. .KET }
  4.  
  5. ;$VER: Instalace_AltFontPatch_WB_1_3 1.3 (7.7.94) © UTX (Stanislav Brabec)
  6.  
  7. Echo "*E[0;20H*E[42;31;1m Instalace programu AltFontPatch *E[0m"
  8. Echo "*N Tento instalátor slouùí k instalaci pro systém ve verzích 1.x!*N"
  9.  
  10. If "{DEST}" EQ ""
  11.  Echo "*N     Chcete-li  nainstalovat  program  AltFontPatch,  klepnëte jednou na*N ikonu  instalátoru, pêidrùte <PÊEÊAÐOVAÇ> a potom klepnëte dvakrát na ikonu*N média, na nëjù chcete program instalovat.*N"
  12. Else
  13.  Echo " Má se provádët instalace programu AltFontPatch na médium ª{DEST}º"
  14.  AskÇeský " Chcete ji provést? (*E[4mA*E[0mno/*E[4mN*E[0me)"
  15.  If NOT WARN
  16.   Skip NOINST
  17.  EndIf
  18.  
  19.  Assign AFP_temp: "{DEST}"
  20.  
  21.  If NOT EXISTS AFP_temp:S/startup-sequence
  22.   Echo " Médium ª{DEST}º není startovací."
  23.   Skip NOINST
  24.  EndIf
  25.  
  26.  If EXISTS AFP_temp:Libs/altfont.library
  27.   Echo " Na médiu ª{DEST}º je jiù profesionální verze programu AltFontPatch."
  28.   AskÇeský " Chcete ji pêepsat? (*E[4mA*E[0mno/*E[4mN*E[0me)"
  29.   If NOT WARN
  30.    Skip NOINST
  31.   EndIf
  32.  EndIf
  33.  
  34.  If NOT EXISTS AFP_temp:Fonts
  35.   MakeDir >NIL: AFP_temp:Fonts
  36.   If WARN
  37.    Echo " Pêi vytváêení adresáêe ¸Fonts¢" NOLINE
  38.    Skip INSTQT
  39.   EndIf
  40.   Echo " Byl vytvoêen adresáê ¸Fonts¢"
  41.  EndIf
  42.  
  43.  If NOT EXISTS AFP_temp:Devs/Keymaps
  44.   MakeDir >NIL: AFP_temp:Devs/Keymaps
  45.   If WARN
  46.    Echo " Pêi vytváêení adresáêe ¸Devs/Keymaps¢" NOLINE
  47.    Skip INSTQT
  48.   EndIf
  49.   Echo " Byl vytvoêen adresáê ¸Devs/Keymaps¢"
  50.  EndIf
  51.  
  52.  Copy AltFontPatch_v1.7/#? AFP_temp:C/ DATES COM QUIET
  53.  If WARN
  54.   Skip W1
  55.  EndIf
  56.  Copy (ClWB|NotifyPrefs) AFP_temp:C/ DATES COM QUIET
  57.  
  58.  If WARN
  59. Lab W1
  60.   Echo " Pêi kopírování do adresáêe ¸C¢" NOLINE
  61.   Skip INSTQT
  62.  EndIf
  63.  Echo " Soubory AltFontPatch, ClWB a NotifyPrefs byly zkopírovány do adresáêe ¸C¢"
  64.  
  65.  If NOT EXISTS AFP_temp:C/RunBack
  66.   Copy runback AFP_temp:C/ DATES COM
  67.   If WARN
  68.    Echo " Pêi kopírování do adresáêe ¸C¢" NOLINE
  69.    Skip INSTQT
  70.   EndIf
  71.   Echo " Soubor runback byl zkopírován do adresáêe ¸C¢"
  72.  EndIf
  73.  
  74.  Copy Fonts/topaz-E2.font AFP_temp:Fonts/ ALL DATES COM QUIET
  75.  If WARN
  76.   Skip W2
  77.  EndIf
  78.  Copy Fonts/topaz-E2 AFP_temp:Fonts/topaz-E2 ALL DATES COM QUIET
  79.  If WARN
  80. Lab W2
  81.   Echo " Pêi kopírování znakových sad" NOLINE
  82.   Skip INSTQT
  83.  EndIf
  84.  Echo " Znakové sady ¸topaz-E2¢ byly zkopírovány do adresáêe ¸Fonts¢"
  85.  
  86.  Copy Devs/Keymaps/(cz|sk) AFP_temp:Devs/Keymaps/ QUIET DATES COM
  87.  If WARN
  88.   Echo " Pêi kopírování mapy klávesnice" NOLINE
  89.   Skip INSTQT
  90.  EndIf
  91.  Echo " Soubory çeské a slovenské klávesnice byly zkopírovány do adresáêe*N   ¸Devs/Keymaps¢"
  92.  
  93.  Search >NIL: AFP_temp:S/startup-sequence AltFontPatch
  94.  If NOT WARN
  95.   Echo " Soubor startup-sequence jiù pêíkaz AltFontPatch obsahuje!"
  96.   AskÇeský " Chcete  provést  zkrácenou  instalaci  (*E[1mpêepíîe soubory*E[0m  ªstartup-sequenceº*N a ªstartup-sequence-IIº!!!)? (*E[4mA*E[0mno/*E[4mN*E[0me)"
  97.   If NOT WARN
  98.    Skip NOINST
  99.   EndIf
  100.  
  101.   Skip QINST
  102.  EndIf
  103.  
  104.  Copy AFP_temp:S/startup-sequence AFP_temp:S/startup-sequence-III
  105.  If WARN
  106.   Echo " Pêi pêístupu k dávce startup-sequence" NOLINE
  107.   Skip INSTQT
  108.  EndIf
  109.  
  110. Lab QINST
  111.  Copy 1.3/#? AFP_temp:S/ DATES COM QUIET
  112.  If WARN
  113.   Echo " Pêi vytváêení nové startovací struktury" NOLINE
  114.   Delete AFP_temp:S/startup-sequence AFP_temp:S/startup-sequence-II QUIET
  115.   Rename AFP_temp:S/startup-sequence-III AFP_temp:S/startup-sequence
  116.   Skip INSTQT
  117.  EndIf
  118.  Echo " Byla vytvoêena nová startovací struktura."
  119.  
  120.  Echo "*N Instalace je hotová!"
  121.  Echo " Nyní mûùete Váî poçítaç z média ª{DEST}º restartovat."
  122.  
  123. EndIf
  124.  
  125. Skip INSTOK
  126.  
  127. Lab NOINST
  128. Echo " Provádëní instalace bylo zruîeno!"
  129. Skip INSTOK
  130.  
  131. Lab INSTQT
  132. Echo " doîlo k chybë.*N Instalace se nezdaêila!"
  133.  
  134. Lab INSTOK
  135. Assign AFP_temp: REMOVE
  136. AskÇeský "*N Stisknëte prosím tlaçítko <VSTUP>."
  137.